home *** CD-ROM | disk | FTP | other *** search
/ MacHome 1999 February/March / MacHome CD (February and March 1999).iso / Edutainment / INFOHIGHWAYDEMOS / demo / MENU.DCR / scripts_52.ls < prev    next >
Encoding:
Text File  |  1999-09-16  |  432 b   |  17 lines
  1. on buttonJFclicked SpriteHS, spriteNum, btnUp, btnDwn
  2.   set btnClk to 1
  3.   set the member of sprite spriteNum to member btnDwn
  4.   updateStage()
  5.   repeat while the mouseDown
  6.     if rollOver(SpriteHS) then
  7.       set the member of sprite spriteNum to member btnDwn
  8.       set btnClk to 1
  9.     else
  10.       set the member of sprite spriteNum to member btnUp
  11.       set btnClk to 0
  12.     end if
  13.     updateStage()
  14.   end repeat
  15.   return btnClk
  16. end
  17.